home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 January / macformat-020.iso / Demos / MF20 / RMDP / RMWF Demo / VPISys Demo / SHARED.DXR / 04993_Sound.ls < prev    next >
Encoding:
Text File  |  1994-08-13  |  111 b   |  9 lines
  1. on mouseUp
  2.   global Flower
  3.   if soundBusy(1) then
  4.     sound stop 1
  5.   else
  6.     puppetSound(Flower)
  7.   end if
  8. end
  9.